home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Interactive Reference Guide / C-C++ Interactive Reference Guide.iso / c_ref / csource5 / 340_01 / ufc033.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-01-09  |  843 b   |  37 lines
  1. /*
  2. Lattice C
  3. ufc033.c
  4. */
  5. /* variable fields */
  6.     #include "_UFC03.h"
  7.     #include "order.h"
  8.  
  9. main() {
  10. /* save screen */
  11.     FKZ = 0;
  12.     _UNIF (&FKZ, FMT, FMT, &RET, &SM, Daten);
  13. /* clear screen and display new format */
  14.     FKZ = 1;
  15.     ORDER:
  16.     memcpy(FMT, "order   ", 8);
  17.     #include "order.i"
  18.     _UNIF (&FKZ, FMT, order.product, &RET, &SM, Daten);
  19. /* same format when ESC */
  20.     if(RET == 99) 
  21.      { FKZ = 3; goto ORDER; }
  22. /* program end when F10 */
  23.     if(RET == 110) goto ENDE;
  24. /* display empty format */
  25.     FKZ = 4;
  26.     memcpy(FMT, "message ", 8);
  27.     #include "message.i"
  28.     _UNIF (&FKZ, FMT, FMT, &RET, &SM, Daten);
  29. /* display new format without clear screen */
  30.     FKZ = 2;
  31.     goto ORDER;
  32. /* display saved screen */
  33.     ENDE:
  34.     FKZ = 5;
  35.     _UNIF (&FKZ, FMT, FMT, &RET, &SM, Daten);
  36. }
  37.